//->$.Fax.!Arcfax.Server.FromArcBBS
// Copyright (c) David Pilling 1994
//
// Download private mail and messages from Arcade
//
// note, id and password are stored in the phone book as
// parameters
//


int main(int mode,string & p1,string & p2)
{
 if(mode==DATA)
 {
  if(getprompt("username",1000))
  {
   sprints(p1);
   if(getprompt("Password",1000))
   {
    sprints(p2);
    if(getprompt("Press any",1000))
    {
     sputc(32);
     if(getprompt("Press any",1000))
     {
      sputc(32);
      sputc(13);
      if(getprompt("Main Menu",1000))
      {
       sputc('A');
       if(getprompt("Really",1000))
       {
        sputc('P');
        if(getprompt("ancel:",1000))
        {
         sputc('Z');
         return(ftpgetfiles());
        }
       }
      }
     }
    }
   }
  }
 }
 return(1);
}

